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onboard the Endeavor orbiter during ^^'^^^e’s'M^FUght'DK^was embedded 

controllers) perform 

transfer of cryogenic liquids in microgravity. 

The Astronaut Sclent* Advisor U» ^^^”([3])^ Z£ a™££ 
modular system that flew onboard die fV^hn ^_ ^^^ J^eriment in vestibular 

PowerBook 170 laptop computer and helped Cl .IPS -based knowledge system that 

physiology in Spacelab. This system was compns^ of a CUPb baseo mom^g y 

mteractedwith HyperCard (a commercialu^ 

Computer) and LabVIEW(a commerci^da^ experiment protocol 

monitor data being collected by the crew and on how to ^^ 5 . In that 

svs S tem 0n CLIPS C ^ 2a sTp^elpp^catio^d communicated v|h HyperOxd via specially- 
S"eS cTm^tTcK^tha, were linked into the HyperCard apphcatton. 

The Prototype Electronic Purchase Request (PEP ™ “^ [2] ^i.EPR°y«^ 
Interestingly, these applications represent cSSSvelowd^OTm.'^spro^sdOT sir 

Requirements for the PEPR system 

A brief description of the PEPR system will help «plain how we determined our approach to the 
problem of integrating CLIPS with other commercial applications. 

Our primary goal in the development of the PEPR SEtaSd 

based technics can improve the osabthty rf aum^w^ow helpmg^ ^ ^ 

route electronic forms. In order to do this, we needed to p This mean t th at in addition to 

usable and provided value in the context of provid e the 

developing the knowledge base send them between 

SM^e ^ dte status 

^previously-sent forms, in terms of who had seen them and who hadn L 

Of course, we didn’t want to have to develop ^ of tee ojhcr tooh 
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application and *en “tvoe" the ’( eXPOrt | the data on *» foim to a disk 81c, switch to the CLIPS 
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Our second try: Apple Events 

Our next attempt at integrating the electronic forms package with CUPS was mnriv^H k» „ 
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What are Apple Events? 

The following provides a W descripdor , offtt ^SSStoSS £5? ta 
Apple Events are a means of sharing date tetwera to app mo exponents are a 4- 

included in System 7. An Apple Event 4 _^ h ^_ ter «g ven j jd” The third component identifies 

character alphanumeric event class 31x1 * The actual data to be sent is a collection of 
the “target application” to which *e event is to be^nt Tte nested ^ 

keyword/data element pairs, and can rang P f eV ent record which specify 

structure. (In addition to these, there are several P . ^ target application can interact 

whether a reply is expected, a reply time-out vatoe, ^d whe&CT t^t^t^puca^ ^ 

; ^LgTco^Sn^ffi •T'oolBox” calls that are available through system 

subroutines. 

Although Apple Evens are a 

EffgJSSS Apple Even, Re g «ny. published 

periodically by Apple Computer. 


Event Class: MISC 
Event ID: DOSC 
Target App: <ProcessID> 

"(load \ "MYKB . CLP \ " ) 


Event Data: 


I? 


Figure 1: An Example Apple Event 

Figure 1 shows an e*an*le of V » 
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pairs. 

SoSppSns“tSh wi’SSded to share La. That is, we didn't want to have to code 
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specific Apple Event handling routines for every other application we were using. This would 
have made it very difficult to ‘swap in” different applications should we have needed to. What we 
r? roo W j S a . wa y by which we could use the power of Apple Events to communicate between 
t-LU'b ana other programs, but make it easier to code the actual events for a given program. 

Our third try: AppleScript 

Just as we were trying to figure out the best way to link CLIPS with the other progr ams we wanted 
to use, we learned about a new scripting technology for the Mac called AppleScript This new 
«aiphng language provides most of the benefits of Apple Events (and is in fact based on the Apple 
Event mechanism) such as control of and interaction with Macintosh applications running either 
oc y or remotely. In addition, it offers some other benefits that pure Apple Event progr ammin g 
does not For example, using AppleScript, one is able to control and share data vithan ever- 
growing array of commercial applications, without having to understand the details of the 
application s Apple Event protocol. AppleScript comes with a reasonably simple Script Editor that 
can be used to compose, check, run, and save scripts. In addition to providing all the constructs 
that one might expect in any programming language (variables, control, I/O primitives) it is also 
extendible and can even be embedded in many applications. 

Si Lrffn? m ^ ie App ! eS J cri ? t Particularly appealing for our use was that it utilized the Apple 

5 ad ^eady added to CLIPS. All that was necessary to permit Jhe 
scnptability we desired was the addition of a new “Apple Event Terminology Extension” 
resource to our already-modified CLIPS application. This AETE resource simply provided the 
AppleScript Editor (and other applications) with a “dictionary” of commands that CLIPS could 
understand, and the underlying Apple Events that the AppleScript should generate. 

A ^?®Lyfy appealing aspect of integrating programs with AppleScript is more and more 
so 1 f twar ? products are supporting AppleScript by becoming scriptable. That of course 
makes it much easier to take advantage of new software products as they come alone. For 
exanple, we recently upgraded the forms tracking data base used by the PEPR system. We were 

nnK, ■r flat " file dal ? pa dmge with a more-powerful relational DBMS product with 

only minor modifications to the AppleScript code linking the DB to the other applications. This 

A^eEvem^ ** dlfficult (if even Possible) had we relied solely on integration with 

to u sin g AppleScript rather than Apple Events is that AppleScript is 
somewhat slower than sending Apple Events directly. However, the increased flexibility and 
power ot AppleScript more than compensates for the comparative lack of speed. 


tell application "CLIPS" of machine "My Mac" 
of zone "Engineering" 
do script " (reset) " 
do script " (run) " 

set myResult to evaluate "(send [wing-1] get -weight) " 
display dialog "Wing weight is " & myResult 
end tell 


Figure 2: An example AppleScript program 
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Figure 2 shows an example script that could be used to control OJPS Sough 

things to note in this example. First, the commands are passed to (XIPS and executed as thoug 
r/had been entered into die Dialog Window The example shows bodi 

f which does not return a result) and the “evaluate” command (which does). The example also 
shows a “display dialog” command which is built in to AppleScript and displays the result in a 
3 didog Sx Of particular interest is that the CLIPS application is running on another 
Macintosh, which is even in another AppleTalk zone. 

Specific CLIPS Extensions 

The following paragraphs describe the actual CLIPS extensions that have been implemented to 
sunTOrt te fMcdoMLity described above. Note that some of these extensions were actually 
SKeSrf™ Robert Dominy. formerly of NAS A Goddani Space Flight Center. 

Receiving Apple Events 

It's now possible to send two types of Apple Events to CLIPS. Each takes a that is 
interpreted by CUPS as though it were a command typed into the Dialog Window. ^ fonrat of 
these Apple Events is dictated by the Apple Event Registry , and they are also supported by a 
variety of other applications. Note that CUPS doesn’t currently return any syntax or execuuon 
Sthe proSn that sent the Apple Events, so it is the sender’s responsibility to ensure that 
the commands sent to CLIPS are syntactically correct. 

The “do script” Event 

The “do script" event (event class = MISC, event ID=IWSC) passes i<sdataasa stmgwhich 
CLIPS interprets as if it were a command that were typed into the Dialog Window. It returns no 
value to die sending program. 

The “evaluate” Event 

The “evaluate” event (event class = MISC, event ID=EVAL) is very similar to the do script event, 

and also passes its data as a string which CLIPS interprets as if it were a L^Xs^aluelis 

into the Dialog Window. However, it does return a value to the sending program. This value 

always a string, and can be up to 1024 bytes in length. 

Sending Apple Events from CLIPS 

The two Apple Events described above can also be sent by CUPS from within a 
W course, the application to which the events are sent must support the events or an jaror wU 
ScS. However S mentioned above, the “do script” and “evaluate” events are very common and 

supported by many Mac applications. 

SendAEScript command 

The SendAEScript command sends a “do script” event and can appear in a CUPS fimction or in 
the right-hand-side of a rule. The syntax of the SendAEScript command is as follows. 

(SendAEScript <target app> <coromand>) 

In the above prototype, <target a PP > is an “application specification” and <cornmand> is a valid 

command untostSble by the target application. An application ^eotonon 

three forms; a simple application name, a combination application name, machine name and 
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AppleTalk Zone name, or a process identifier (as returned by ppcBrowser, described below). The 
sendAEScript command returns zero if die command is successfully sent to the remote 
application, and a variety of error codes if it was not Note that a return code of zero does not 
guarantee that the command was successfully executed by the remote application; only that it was 
sent successfully . 

The following examples show each of the application specification types. 

CLIPS> (SendAEScript "HyperCard" "put \"hello\" into msg") 

0 

CLIPS> 

The above example sends a “do script” Apple Event to HyperCard running on the local machine, 
and causes it to put “hello” into the HyperCard message box. 

CLIPS> (SendAEScript "HyperCard" "John’s Mac" "RiD" "put \"hello\" into msg") 

0 

CLIPS> 

The above example sends a similar “do script” Apple Event to HyperCard running on a computer 
called “John’s Mac” in an AppleTalk zone named “R&D”. Note that it is necessary to e f ca P® 
quote characters surrounding the string “hello” to avoid them being interpreted by the CLIPS 
reader. 

SendAEEval command 

The SendAEEval command is very similar to the SendAEScript command, differing only in that it 
returns die value that results from the target application evaluating the command. 

(SendAEEval <target app> <command>) 

The following examples show CLIPS sending a simple command to HyperCard running on the 
local machine: 

CLIPS> (SendAEEval "HyperCard" "word 2 of \"ray dog has fleas\" ") 

"dog" 

CL1PS> 

Note that the result returned by SendAEEval is always a string, e.g.: 

CLIPS> (SendAEEval "HyperCard" "3 + 6") 

ngn 

CLIPS> 

The Send AEE val command does not currently support commands that require the target ^application 
to interact with its user. For example, one could not use SendAEEval to send an "ask command 
to HyperCard. 

PPCBrowser command 

The ppcBrowser function permits the CLIPS user to select an AppleEvent-aware program that is 
currently running locally or on a remote Mac. This command brings up a dialog box from which 
the user can click on various AppleTalk zones, machine names and “high-level event aware 
applications. It returns a pointer to a “process ID” which can be bound to a CLIPS variable and 
used in the previously-described “send” commands. 
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CLIPS> (defglobal ?*myapp* * (PPCBrowser) ) 

CLIPS> ?*ntyapp* 

<Pointer : 00FF85E8> 

The above example doesn’t show the user’s interaction with the dialog box. 

GetAEAddress command 

The GetAEAddress function is similar to PPCBrowser in that it returns a pointer to a high-level 
aware application that can then be bound to a variable that’s used to specify the target of one of the 
“SendAE” commands described earlier. Rather than presenting a dialog box to the user, however, 
it instead takes a “target app” parameter similar to that described above. 

(GetAEAddress <target app>) 

The following example shows the GetAEAddress function being used to specify the target of a 
SendAEEval fimction call. 

CLIPS> (defglobal ?*myapp* - (GetAEAddress "HyperCard" "Jack's Mac" "R4D") ) 
CLIPS> (SendAEEval ?*nyapp* "8 + 9") 

"17" 

CLIPS> 

Timestamp command 

Another extension we've made is unrelated to inter-program communication. We have added a 
Timestamp command to CLIPS. It returns the current system date and time as a string: 

CLIPS> (TimeStamp) 

"Wed Sep 7 12:34:56 1994" 

CLIPS> 

Possible Future Extensions 

In addition to the CLIPS extensions described above, we are also looking into the possibility of 
implementing several other enhancements. First, we want to generalize the current Apple Event 
sending mechanisms to permit the CLIPS programmer to specify the event class and event ID of 
the events to be sent This is a relatively straightforward extension if we limi t the event data to a 
string passed as the “direct object” parameter. It would be somewhat harder to allow the CLIPS 
programmer to specify more complex data structures, because we would have to design and 
implement a mechanism that allows the CLIPS programmer to construct these more complex 
combinations of keywords, parameters, and attributes. We will probably implement these 
extensions in stages. 

Another extension we’re considering is to make CLIPS “attachable”. This would permit the 
CLIPS programmer to include pieces of AppleScript code in the knowledge base itself. This 
would significantly enhance the power of CLIPS, as it would make it possible to compose, 
compile, and execute AppleScript programs from within the CLIPS environment, and save these 
programs as part of a CLIPS knowledge base. 
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